home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Almathera Ten Pack 3: CDPD 3
/
Almathera Ten on Ten - Disc 3: CDPD3.iso
/
fish
/
001-100
/
001-025
/
024
/
modula-2
/
m2
/
breaks.def
< prev
next >
Wrap
Text File
|
1995-03-17
|
622b
|
22 lines
(********************************************************************************
Name : Breaks.DEF
Version : 1.0
Purpose : user break detect
Authors : cn/jr/ms/red
Modified : 13.3.86 10:00 ms
State : untested
Requirements :
********************************************************************************)
DEFINITION MODULE Breaks;
TYPE BreakFlags = (breakC, breakD, breakE, breakF);
PROCEDURE DetectBreak(flag: BreakFlags): BOOLEAN;
(* DetectBreak returns TRUE if the requested break flag is set.
The tested flag is always cleared! *)
END Breaks.